program
	int a[10];  int i;  int s;
	
	i := -1;
	while i < 11 do
		a[i] := i;
		s := s + a[i*2];
		i := i + 1;	
	od
	
	write s;
end
